home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Tiger Disk 84
/
Tiger_Disk_084_20xx_Tiger-Crew-Disk_de_Side_D.d64
/
02.MNMN BtB MNMN
(
.txt
)
next >
Wrap
Commodore BASIC
|
2023-02-26
|
7KB
|
305 lines
0 forx=39to0step-1:print"":poke53280,6:poke53281,6
1 printtab(x)"[145][145] [157] [157] [157] [157] [157][160][157][160][157] [157] [157] [157][160][157][160]
2 [130]x
3 [129]x[178]0[164]39
4 [153][163]x)" cmd cmd cmd cmd cmdclosecmdclosecmd cmd cmd cmd cmdclosecmdcloseononononononononononononon
5 nextx
8 x=10
9 print""
10 print"[147][155]"
11 x=10
12 print""
13 printtab(x)"
14 [153][163]x)"orlenlen
15 printtab(x)"[173][195][174]
16 [153][163]x)" peek
17 printtab(x)" [194]
18 [153][163]x)" peek
19 printtab(x)" [173]
20 [153]"onononononononon"
21 [153][163]x)"cont
22 printtab(x)"[176][195][195]
23 [153][163]x)"/len^
24 printtab(x)" [194]
25 [153][163]x)" peek
26 printtab(x)" [194]
27 [153][163]x)" /
29 print"[145][145][145][145][145][145][145][145]"
30 printtab(x)"[159]
31 [153][163]x)"orlenlen
32 printtab(x)"[173][195][174]
33 [153][163]x)" peek
34 printtab(x)" [194]
35 [153][163]x)" peek
36 printtab(x)" [173]
39 [153]"onononononononon"
40 [153][163]x)"print
41 printtab(x)"[153][176][195][195][195][195]
42 [153][163]x)"print/len^ or
43 printtab(x)"[153] [194] [194]
44 [153][163]x)"print peek peek
45 printtab(x)"[153] [194] [194]
46 [153][163]x)"print /lenexp
49 print"[145][145][145][145][145][145][145][145]"
50 printtab(x)" [154]
51 [153][163]x)"orlencontlenlenlen
52 printtab(x)"[173][195][154][174] [176]
53 [153][163]x)" contpeek peek
54 printtab(x)" [154][194] [194]
55 [153][163]x)" contpeek peek
56 printtab(x)" [154][173][195][189]
59 [153]"onononononononon"
60 [153][163]x)"print open
61 printtab(x)"[153][176][195][159][195][195][195]
62 [153][163]x)"print/lenopen^ or
63 printtab(x)"[153] [159][194] [194]
64 [153][163]x)"print openpeek peek
65 printtab(x)"[153] [159][194] [194]
66 [153][163]x)"print open/lenexp
69 print"[145][145][145][145][145][145][145][145]"
70 printtab(x)"[159] [153]
71 [153][163]x)"openorlenprintlenlenlenlen^
72 printtab(x)"[159][173][195][153][174] [176][195][189]
73 [153][163]x)"open printpeek peek
74 printtab(x)"[159] [153][194] [194]
75 [153][163]x)"open printpeek peek
76 printtab(x)"[159] [153][173][195][189]
79 [153]"onononononononon"
80 [153][163]x)"cont cont
81 printtab(x)"[154][176][195][195][195][154][195][195][174]
82 [153][163]x)"cont/len^ contorlenexp
83 printtab(x)"[154] [194] [154][194]
84 [153][163]x)"cont peek contpeek
85 printtab(x)"[154] [194] [154][194]
86 [153][163]x)"cont /lencontexp
89 print"[145][145][145][145][145][145][145][145]"
90 printtab(x)"[154] [153] [159]
91 [153][163]x)"contorlenprintlenlenopenlenlen^
92 printtab(x)"[154][173][195][153][174] [159][176][195][189]
93 [153][163]x)"cont printpeek openpeek
94 printtab(x)"[154] [153][194] [159][194]
95 [153][163]x)"cont printpeek openpeek
96 printtab(x)"[154] [153][173][195][159][189]
99 [153]"onononononononon"
100 [153][163]x)"cont open print
101 printtab(x)"[154][176][195][159][195][195][153][195][195][174][176][195][174]
102 [153][163]x)"cont/lenopen^ printorlenexppeek peek
103 printtab(x)"[154] [159][194] [153][194] [194] [194]
104 [153][163]x)"cont openpeek printpeek peek peek
105 printtab(x)"[154] [159][194] [153][194] [194] [194]
106 [153][163]x)"cont open/lenprintexp /lenexp
109 print"[145][145][145][145][145][145][145][145]"
110 printtab(x)"[154] [154]
111 [153][163]x)"contorlenlenlenlenlencont^orlen^
112 printtab(x)"[154][173][195][174] [176][195][154][189][194] [194]
113 [153][163]x)"cont peek peek cont peek peek
114 printtab(x)"[154] [194] [194] [154] [194] [194]
115 [153][163]x)"cont peek peek cont peek peek
116 printtab(x)"[154] [173][195][189] [154] [173][195][189]
119 [153]"onononononononon"
120 [153][163]x)"cont print open
121 printtab(x)"[154][176][195][195][195][153][195][195][159][174][176][195][174]
122 [153][163]x)"cont/len^ printorlenopenexppeek peek
123 printtab(x)"[154] [194] [153][194] [159] [194] [194]
124 [153][163]x)"cont peek printpeek open peek peek
125 printtab(x)"[154] [194] [153][194] [159] [194] [194]
126 [153][163]x)"cont /lenprintexp open /lenexp
129 print"[145][145][145][145][145][145][145][145]"
130 printtab(x)"[154] [153]
131 [153][163]x)"contorlenlenlenlenlenprint^orlen^
132 printtab(x)"[154][173][195][174] [176][195][153][189][194] [194]
133 [153][163]x)"cont peek peek print peek peek
134 printtab(x)"[154] [194] [194] [153] [194] [194]
135 [153][163]x)"cont peek peek print peek peek
136 printtab(x)"[154] [173][195][189] [153] [173][195][189]
139 [153]"onononononononon"
140 [153][163]x)"cont cont
141 printtab(x)"[154][176][195][195][195][195][195][174][154][176][195][174]
142 [153][163]x)"cont/len^ orlenexpcontpeek peek
143 printtab(x)"[154] [194] [194] [154][194] [194]
144 [153][163]x)"cont peek peek contpeek peek
145 printtab(x)"[154] [194] [194] [154][194] [194]
146 [153][163]x)"cont /lenexp cont/lenexp
149 print"[145][145][145][145][145][145][145][145]"
150 printtab(x)"[154] [153] [159]
151 [153][163]x)"contorlenlenlenlenlenprint^openorlen^
152 printtab(x)"[154][173][195][174] [176][195][153][189][159][194] [194]
153 [153][163]x)"cont peek peek print openpeek peek
154 printtab(x)"[154] [194] [194] [153] [159][194] [194]
155 [153][163]x)"cont peek peek print openpeek peek
156 printtab(x)"[154] [173][195][189] [153] [159][173][195][189]
159 [153]"onononononononon"
160 [153][163]x)"cont open print
161 printtab(x)"[154][176][195][195][195][195][195][159][174][153][176][195][174][176][195][195][195]
162 [153][163]x)"cont/len^ orlenopenexpprintpeek peekpeek orright$
163 printtab(x)"[154] [194] [194] [159] [153][194] [194][194] [194][194]
164 [153][163]x)"cont peek peek open printpeek peekpeek peekpeek
165 printtab(x)"[154] [194] [194] [159] [153][194] [194][194] [173][189]
166 [153][163]x)"cont /lenexp open print/lenexp/lenlenlen
169 print"[145][145][145][145][145][145][145][145]"
170 printtab(x)"[154] [154]
171 [153][163]x)"contorlenlenlenlenlen^orlencont^orlenlenlen
172 printtab(x)"[154][173][195][174] [176][195][189][194] [154][194][194] [176][201]
173 [153][163]x)"cont peek peek peek contpeekpeek peekpeek
174 printtab(x)"[154] [194] [194] [194] [154][194][194] [194][194]
175 [153][163]x)"cont peek peek peek contpeekpeek /exp
176 printtab(x)"[154] [173][195][189] [173][195][154][189][173][195][195][195]
179 [153]"onononononononon"
180 [153][163]x)"cont print open
181 printtab(x)"[154][176][195][195][195][195][195][174][153][176][195][159][174][176][195][195][195]
182 [153][163]x)"cont/len^ orlenexpprintpeek openpeekpeek orright$
183 printtab(x)"[154] [194] [194] [153][194] [159][194][194] [194][194]
184 [153][163]x)"cont peek peek printpeek openpeekpeek peekpeekclose
185 printtab(x)"[154] [194] [194] [153][194] [159][194][194] [173][189]
186 [153][163]x)"cont /lenexp print/lenopenexp/lenlenlen
189 print"[145][145][145][145][145][145][145][145]"
190 printtab(x)"[154] [159] [153]
191 [153][163]x)"contorlenlenlenlenlen^openorlenprint^orlenlenlenright$
192 printtab(x)"[154][173][195][174] [176][195][189][159][194] [153][194][194] [176][201][194]
193 [153][163]x)"cont peek peek openpeek printpeekpeek peekpeekpeek
194 printtab(x)"[154] [194] [194] [159][194] [153][194][194] [194][194][194]
195 [153][163]x)"cont peek peek openpeek printpeekpeek /exppeek
196 printtab(x)"[154] [173][195][189] [159][173][195][153][189][173][195][195][195][189]
199 [153]"onononononononon"
200 [153][163]x)"cont cont
201 printtab(x)"[154][176][195][195][195][195][195][174][176][195][174][176][154][195][195][195][201][176][195]
202 [153][163]x)"cont/len^ orlenexppeek peekpeekcont orright$peekpeek
203 printtab(x)"[154] [194] [194] [194] [194][194][154] [194][194][194][194]
204 [153][163]x)"cont peek peek peek peekpeekcont peekpeekpeekpeek
205 printtab(x)"[154] [194] [194] [194] [194][194][154] [173][189][194][194]
206 [153][163]x)"cont /lenexp /lenexp/contlenlenlenexp/len
209 print"[145][145][145][145][145][145][145][145]"
210 printtab(x)"[154] [153] [159] [144]
211 [153][163]x)"contorlenlenlenlenlen^orlenprint^oropenlenstoplenlenright$orlen
212 printtab(x)"[154][173][195][174] [176][195][189][194] [153][194][194][159] [144][176][201][194][194]
213 [153][163]x)"cont peek peek peek printpeekpeekopen stoppeekpeekpeekpeek
214 printtab(x)"[154] [194] [194] [194] [153][194][194][159] [144][194][194][194][194]
215 [153][163]x)"cont peek peek peek printpeekpeekopen stop/exppeekpeek
216 printtab(x)"[154] [173][195][189] [173][195][153][189][173][159][195][144][195][195][189][173][195]
219 [153]"onononononononon"
220 [153][163]x)"cont open print
221 printtab(x)"[154][176][195][195][195][195][195][174][176][195][159][174][176][153][195][195][195][201][176][195][195][195][174]
222 [153][163]x)"cont/len^ orlenexppeek openpeekpeekprint orright$peekpeek orlenexp
223 printtab(x)"[154] [194] [194] [194] [159][194][194][153] [194][194][194][194] [173][174]
224 [153][163]x)"cont peek peek peek openpeekpeekprint peekpeekpeekpeek orexp
225 printtab(x)"[154] [194] [194] [194] [159][194][194][153] [173][189][194][194] [173][195][174]
226 [153][163]x)"cont /lenexp /lenopenexp/printlenlenlenexp/lenlenlenexp
229 print"[145][145][145][145][145][145][145][145]"
230 printtab(x)"[154] [154]
231 [153][163]x)"contorlenlenlenlenlen^orlen^orlencontlenlenright$orlenlenlen^
232 printtab(x)"[154][173][195][174] [176][195][189][194] [194][194] [154][176][201][194][194] [176][195][189]
233 [153][163]x)"cont peek peek peek peekpeek contpeekpeekpeekpeek /^
234 printtab(x)"[154] [194] [194] [194] [194][194] [154][194][194][194][194] [176][189]
235 [153][163]x)"cont peek peek peek peekpeek cont/exppeekpeek /len^
236 printtab(x)"[154] [173][195][189] [173][195][189][173][195][154][195][195][189][173][195][195][195][189]
239 [153]"onononononononon"
240 [153][163]x)"cont print open
241 printtab(x)"[154][176][195][195][195][195][195][174][176][195][174][176][153][195][159][195][195][201][176][195][195][195][174]
242 [153][163]x)"cont/len^ orlenexppeek peekpeekprint openorright$peekpeek orlenexp
243 printtab(x)"[154] [194] [194] [194] [194][194][153] [159][194][194][194][194] [173][174]
244 [153][163]x)"cont peek peek peek peekpeekprint openpeekpeekpeekpeek orexp
245 printtab(x)"[154] [194] [194] [194] [194][194][153] [159][173][189][194][194] [173][195][174]
246 [153][163]x)"cont /lenexp /lenexp/printlenopenlenlenexp/lenlenlenexp
249 print"[145][145][145][145][145][145][145][145]"
250 printtab(x)"[154] [159] [153]
251 [153][163]x)"contorlenlenlenlenlen^orlen^oropenlenprintlenlenright$orlenlenlen^
252 printtab(x)"[154][173][195][174] [176][195][189][194] [194][194][159] [153][176][201][194][194] [176][195][189]
253 [153][163]x)"cont peek peek peek peekpeekopen printpeekpeekpeekpeek /^
254 printtab(x)"[154] [194] [194] [194] [194][194][159] [153][194][194][194][194] [176][189]
255 [153][163]x)"cont peek peek peek peekpeekopen print/exppeekpeek /len^
256 printtab(x)"[154] [173][195][189] [173][195][189][173][159][195][153][195][195][189][173][195][195][195][189]
259 [153]"onononononononon"
260 [153][163]x)"cont
261 printtab(x)"[154][176][195][195][195][195][195][174][176][195][174][176][195][195][195][201][176][195][195][195][174]
262 [153][163]x)"cont/len^ orlenexppeek peekpeek orright$peekpeek orlenexp
263 printtab(x)"[154] [194] [194] [194] [194][194] [194][194][194][194] [173][174]
264 [153][163]x)"cont peek peek peek peekpeek peekpeekpeekpeek orexp
265 printtab(x)"[154] [194] [194] [194] [194][194] [173][189][194][194] [173][195][174]
266 [153][163]x)"cont /lenexp /lenexp/lenlenlenexp/lenlenlenexp
269 print"[145][145][145][145][145][145][145][145]"
270 printtab(x)"[154] [153]
271 [153][163]x)"contorlenlenlenlenlen^orlen^orlenprintlenlenright$orlenlenlen^
272 printtab(x)"[154][173][195][174] [176][195][189][194] [194][194] [153][176][201][194][194] [176][195][189]
273 [153][163]x)"cont peek peek peek peekpeek printpeekpeekpeekpeek /^
274 printtab(x)"[154] [194] [194] [194] [194][194] [153][194][194][194][194] [176][189]
275 [153][163]x)"cont peek peek peek peekpeek print/exppeekpeek /len^
276 printtab(x)"[154] [173][195][189] [173][195][189][173][195][153][195][195][189][173][195][195][195][189]
279 [153]"onononononononon"
280 [153][163]x)"cont open
281 printtab(x)"[154][176][195][195][195][195][195][174][176][195][174][176][195][159][195][195][201][176][195][195][195][174]
282 [153][163]x)"cont/len^ orlenexppeek peekpeek openorright$peekpeek orlenexp
283 printtab(x)"[154] [194] [194] [194] [194][194] [159][194][194][194][194] [173][174]
284 [153][163]x)"cont peek peek peek peekpeek openpeekpeekpeekpeek orexp
285 printtab(x)"[154] [194] [194] [194] [194][194] [159][173][189][194][194] [173][195][174]
286 [153][163]x)"cont /lenexp /lenexp/lenopenlenlenexp/lenlenlenexp
287 print"[145][145][145][145][145][145][145][145]"
288 printtab(x)"[154] [159]
289 [153][163]x)"contorlenlenlenlenlen^orlen^orlenlenlenright$openorlenlenlen^
290 printtab(x)"[154][173][195][174] [176][195][189][194] [194][194] [176][201][194][159][194] [176][195][189]
291 [153][163]x)"cont peek peek peek peekpeek peekpeekpeekopenpeek /^
292 printtab(x)"[154] [194] [194] [194] [194][194] [194][194][194][159][194] [176][189]
293 [153][163]x)"cont peek peek peek peekpeek /exppeekopenpeek /len^
294 printtab(x)"[154] [173][195][189] [173][195][189][173][195][195][195][189][159][173][195][195][195][189]
295 [153]"onononononononon"
296 [153][163]x)"cont
297 printtab(x)"[154][176][195][195][195][195][195][174][176][195][174][176][195][195][195][201][176][195][195][195][174]
298 [153][163]x)"cont/len^ orlenexppeek peekpeek orright$peekpeek orlenexp
299 printtab(x)"[154] [194] [194] [194] [194][194] [194][194][194][194] [173][174]
300 [153][163]x)"cont peek peek peek peekpeek peekpeekpeekpeek orexp
301 printtab(x)"[154] [194] [194] [194] [194][194] [173][189][194][194] [173][195][174]
302 [153][163]x)"cont /lenexp /lenexp/lenlenlenexp/lenlenlenexp
320 fort=1to500:nextt
330 fora=0to7:poke53270,a:nexta
331 fora=7to0step-1:poke53270,a:nexta
332 fora=0to7:poke53270,a:nexta
333 fora=7to0step-1:poke53270,a:nexta
334 fora=0to7:poke53270,a:nexta
335 fora=7to0step-1:poke53270,a:nexta
336 fora=0to7:poke53270,a:nexta
337 fora=7to0step-1:poke53270,a:nexta
338 fora=0to7:poke53270,a:nexta
339 fora=7to0step-1:poke53270,a:nexta
340 fora=0to7:poke53270,a:nexta
341 fora=7to0step-1:poke53270,a:nexta
342 fora=0to7:poke53270,a:nexta
343 fora=7to0step-1:poke53270,a:nexta
344 fora=0to7:poke53270,a:nexta
345 fora=7to0step-1:poke53270,a:nexta
346 fora=0to7:poke53270,a:nexta
347 fora=7to0step-1:poke53270,a:nexta
348 fora=0to7:poke53270,a:nexta
349 fora=7to0step-1:poke53270,a:nexta
350 fora=0to7:poke53270,a:nexta
351 fora=7to0step-1:poke53270,a:nexta
352 fora=0to7:poke53270,a:nexta
353 fora=7to0step-1:poke53270,a:nexta
354 fora=0to7:poke53270,a:nexta
355 fora=7to0step-1:poke53270,a:nexta
356 fora=0to7:poke53270,a:nexta
357 fora=7to0step-1:poke53270,a:nexta
358 fora=0to7:poke53270,a:nexta
359 fora=7to0step-1:poke53270,a:nexta
360 fora=0to7:poke53270,a:nexta
361 fora=7to0step-1:poke53270,a:nexta
365 fort=1to1000:nextt
368 forx=39to0step-1:print""
369 printtab(x)"[145][145] [157] [157] [157] [157] [157][160][157][160][157] [157] [157] [157][160][157][160]
370 [130]x
371 [129]x[178]0[164]39
372 [153][163]x)" cmd cmd cmd cmd cmdclosecmdclosecmd cmd cmd cmd cmdclosecmdcloseononononononononononononon
375 nextx
376 x=10
377 print""
378 print"[147][155]"
379 print" code.......tomz
380 [153]" gfx.........c64"
390 [129]t[178]1[164]400:[130]t
399 [129]x[178]39[164]0[169][171]1:[153]""
400 [153][163]x)"onon cmd cmd cmd cmd cmdclosecmdclosecmd cmd cmd cmdclosecmdclose
401 nextx
402 forx=0to39
403 printtab(x)" [157] [157] [157] [157] [157][160][157][160][157] [157] [157] [157] [157][160][157][160][145][145][145][145][145][145][145][145][145][145][145][145][145]
404 [130]x
405 x[178]10
410 [147]"03.*",8,1:[138]